home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Softdisk Supreme
/
Softdisk Supreme.iso
/
pc
/
DSK Files
/
0-49
/
SD018c.dsk
/
COOKBOOK.REVISITED.bas
< prev
next >
Wrap
BASIC Source File
|
2003-06-12
|
1KB
|
23 lines
10 REM COOKBOOK.REVISITED
20 TEXT : SPEED= 255: HOME
30 HTAB 10: PRINT "COOKBOOK REVISITED"
40 PRINT : PRINT " OLD SOFTDISK SUBSCRIBERS ARE"
50 PRINT : PRINT "FAMILIAR WITH JIM GANZ'S RECIPE FILING"
60 PRINT : PRINT "PROGRAM. GENE FINNELL OF TORRANCE,"
70 PRINT : PRINT "CALIFORNIA HAS ADDED AN EDITOR ROUTINE"
80 PRINT : PRINT "TO JIM'S WORK. THE NEW VERSION OF"
90 PRINT : PRINT "'RECIPE FILE 1.3' WILL WORK WITH YOUR"
100 PRINT : PRINT "OLD RECIPES."
105 PRINT : HTAB 12: INVERSE : PRINT " HIT SPACE BAR ";: NORMAL : GET R$: PRINT R$
110 HOME : PRINT " NEW SOBSCRIBERS CAN START FROM"
120 PRINT : PRINT "SCRATCH WITH THE IMPROVED VERSION. WE"
130 PRINT : PRINT "SUGGEST YOU MOVE RECIPE FILE 1.3 OVER"
140 PRINT : PRINT "TO AN EMPTY DISKETTE. IT CREATES"
150 PRINT : PRINT "SEVERAL FILES WHICH WILL GROW AS YOU"
160 PRINT : PRINT "ADD RECIPES."
170 PRINT : PRINT : PRINT : HTAB 10: PRINT "1 = BACK TO MENU"
180 PRINT : HTAB 10: PRINT "2 = RUN RECIPE FILE 1.3"
190 PRINT : HTAB 10: GET R$: PRINT R$
200 IF R$ = "1" THEN PRINT CHR$(4);"RUN KICK.IT.OFF"
210 IF R$ = "2" THEN PRINT CHR$(4);"RUN RECIPE FILE 1.3"
220 GOTO 110